IF exists(SELECT * FROM dbo.sysobjects WHERE name='dupliceerLeraar' AND xtype='P') 
BEGIN
	DROP PROCEDURE dupliceerLeraar
END
GO

CREATE procedure dupliceerLeraar
(@nieuw char(4), @oud char(4), @vak varchar(2), @klas varchar(5))
as
begin
if not exists(select * from leraars where naamcode=@nieuw) 
  begin
    insert into leraars(naamcode)
           values(@nieuw)
  end 

insert into ambtsverdeling(naamcode,vakcode,klas,aantalUren,samenMet)
select @nieuw,vakcode,klas,aantalUren,samenMet 
from ambtsverdeling
where naamcode=@oud
	and vakcode like @vak
	and klas like @klas


insert into opdracht(naamcode,vakcode,klas,jaar,rekencode)
select @nieuw,vakcode,klas,jaar,rekencode 
from opdracht
where naamcode=@oud
	and vakcode like @vak
	and klas like @klas

insert into rooster(deLeraar,hetVak,deKlas,deDag,hetUur,hetLokaal,variant)
select @nieuw,hetVak,deKlas,deDag,hetUur,hetLokaal,variant 
from rooster
where deLeraar=@oud
	and hetVak like @vak
	and deKlas like @klas

insert into seminarieRooster(groepscode,vakcode,naamcode,deDag,hetUur,hetLokaal)
select groepscode,vakcode,@nieuw,deDag,hetUur,hetLokaal 
from seminarieRooster
where naamcode=@oud
	and vakcode like @vak

insert into seminarieLeraars(naamcode,groepscode,vakcode,rekencode,vakvolgorde,aantalUren,blokaard,blokNr,loopbaanVolgnummer)
select @nieuw,groepscode,vakcode,rekencode,vakvolgorde,aantalUren,blokaard,blokNr,loopbaanVolgnummer
from seminarieLeraars
where naamcode=@oud
	and vakcode like @vak
end